home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / taskplan.arc / TASKPLAN.BAS (.txt) < prev   
Encoding:
GW-BASIC  |  1984-04-14  |  21.5 KB  |  27 lines
  1. 10  ' TASKPLAN     Version 1.0
  2. 20  '
  3. 30  ' (C) Copyright 1984  C. Lamar Williams
  4. 40  ' Williams Software & Services
  5. 50  ' 1114 Pusateri Way
  6. 60  ' San Jose, California 95121
  7. 70  '
  8. 80  '  TASKPLAN generates an integrated cost/task schedule.
  9. 90  '  Given the irregular time periods and costs of various overlapping
  10. 100  ' tasks, TASKPLAN solves for each period's incremental cost and the
  11. 110  ' cumulative cost.
  12. 120  '
  13. 130  CLEAR ,60864,1000 : OPTION BASE 1 : SCREEN 0,0 : WIDTH 80 : CLOSE : KEY OFF : COLOR 0,6,6 : CLS
  14. 140  DEFINT A,I,J,N,P,R,S,X,F
  15. 150  DEFDBL C,T,Y
  16. 160  DEFSTR H,G
  17. 170  FLD = 0 :FL1 = 0 :FL2 = 0 :FL3 = 0 :FL4 = 0
  18. 180  BLK$ = "                    "
  19. 190  IT = 50 : GIT = "50"
  20. 200  JP = 60 : GJP = "60"
  21. 210  DIM BT(IT), ET(IT), CT(IT), CM1(IT), CM2(IT), TT$(IT), Y(IT,JP)
  22. 220  DIM X(JP), TK(JP), CI(JP), CC(JP), CTM(IT)
  23. 230  DIM H(79,13)
  24. 240  GPN = "" : RM$ = "" : CM$ = "" : CM11 = 1 : CM2 = 1 : CM1N$ = ""
  25. 250  FOR I = 1 TO IT
  26. 260  TT$(I) = "" :BT(I) = 0
  27.